 5  TEXT 
 6  HOME 
 10  PRINT "********************************"
 11  PRINT "*                              *"
 12  PRINT "*       ROD'S COLOR MENU       *"
 13  PRINT "*                              *"
 14  PRINT "* Aztec C65 Demos              *"
 20  PRINT "* 1 -   BRUN Lores Demo + Rod  *"
 21  PRINT "* 2 -   BRUN Rod Lores         *"
 22  PRINT "* 3 -   BRUN Rod Hires         *"
 23  PRINT "* CC65 Demos                   *"
 24  PRINT "* 4 -   BRUN Rod               *"
 25  PRINT "* 5 -   BRUN Rod33             *" 
 26  PRINT "* 6 -   BRUN RodHicc (Hires)   *" 
 27  PRINT "*                              *"
 28  PRINT "* ESC - EXIT TO ProDOS 8       *"
 29  PRINT "*                              *"
 30  PRINT "********************************"
 150  GET A$
 160  IF A$ =  CHR$ (27) THEN  GOTO 500
 165  TEXT 
 166  HOME 
 170  IF A$ = "1" THEN  GOTO 410
 171  IF A$ = "2" THEN  GOTO 420
 172  IF A$ = "3" THEN  GOTO 430
 173  IF A$ = "4" THEN  GOTO 440
 174  IF A$ = "5" THEN  GOTO 450 
 175  IF A$ = "6" THEN  GOTO 460 
 200  GOTO 5
 410  PRINT "PLEASE WAIT...": PRINT  CHR$ (4);"BRUN LODEMO.PRG"
 420  PRINT "PLEASE WAIT...": PRINT  CHR$ (4);"BRUN RODLO.PRG"
 430  PRINT "PLEASE WAIT...": PRINT  CHR$ (4);"BRUN RODHI.PRG"
 440  PRINT "PLEASE WAIT...": PRINT  CHR$ (4);"BRUN ROD.PRG"
 450  PRINT "PLEASE WAIT...": PRINT  CHR$ (4);"BRUN ROD33.PRG"
 460  PRINT "PLEASE WAIT...": PRINT  CHR$ (4);"BRUN RODHICC.PRG"
 500  TEXT 
 510  HOME 
 520  CALL  - 1184: CALL 42350
 530  REM  THIS IS THE END
 540  NEW 
